object Srv_NotKSForm: TSrv_NotKSForm
  Left = 192
  Top = 107
  Width = 456
  Height = 407
  BorderWidth = 6
  Caption = #23578#26410#24320#32771#30340#32771#29983
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 436
    Height = 318
    Align = alClient
    Caption = #23578#26410#24320#32771#30340#32771#29983#65306
    TabOrder = 0
    object dxDBGrid1: TdxDBGrid
      Left = 2
      Top = 16
      Width = 432
      Height = 300
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = #23398#21495
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      PopupMenu = PopupMenu1
      TabOrder = 0
      DataSource = DataSource1
      Filter.Criteria = {00000000}
      OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoRowSelect, edgoUseBitmap]
      object dxDBGrid1Column1: TdxDBGridColumn
        Width = 66
        BandIndex = 0
        RowIndex = 0
        FieldName = #24207#21495
      end
      object dxDBGrid1Column2: TdxDBGridMaskColumn
        Width = 117
        BandIndex = 0
        RowIndex = 0
        FieldName = #23398#21495
      end
      object dxDBGrid1Column3: TdxDBGridMaskColumn
        Width = 154
        BandIndex = 0
        RowIndex = 0
        FieldName = #22995#21517
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 318
    Width = 436
    Height = 43
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      436
      43)
    object BitBtn2: TBitBtn
      Left = 256
      Top = 12
      Width = 75
      Height = 25
      Caption = #21047#26032'[&F]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 358
      Top = 12
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #36864#20986'[&X]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn3Click
    end
    object BitBtn1: TBitBtn
      Left = 168
      Top = 12
      Width = 75
      Height = 25
      Caption = #26597#35810'[&S]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object Edit1: TEdit
      Tag = 9999
      Left = 61
      Top = 14
      Width = 101
      Height = 22
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Tag = 9999
      Left = 4
      Top = 14
      Width = 51
      Height = 22
      ItemHeight = 14
      ItemIndex = 0
      TabOrder = 4
      Text = #23398#21495
      Items.Strings = (
        #23398#21495
        #22995#21517)
    end
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 183
    Top = 128
  end
  object PopupMenu1: TPopupMenu
    Left = 256
    Top = 176
    object N6: TMenuItem
      Caption = #21517#21333#23548#20986#33267'Excel'
      OnClick = N6Click
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.xls'
    FileName = #26410#21442#21152#32771#35797#30340#32771#29983#21517#21333'.xls'
    Filter = 'Excel '#25991#20214'(*.xls)|*.xls'
    FilterIndex = 0
    Left = 296
    Top = 176
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    CommandText = 
      'select xs.'#23398#21495',xs.'#22995#21517' from '#32771#29983#20449#24687#34920' xs where xs.'#23398#21495' not in (select '#23398#21495' f' +
      'rom '#32771#29983#32771#35797#34920') order by '#23398#21495
    Params = <>
    ProviderName = 'Srv_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    OnCalcFields = ClientDataSet1CalcFields
    Left = 152
    Top = 129
    object ClientDataSet1Field: TIntegerField
      FieldKind = fkCalculated
      FieldName = #24207#21495
      Calculated = True
    end
    object ClientDataSet1CDSDesigner: TStringField
      FieldName = #23398#21495
      Size = 8
    end
    object ClientDataSet1CDSDesigner2: TStringField
      FieldName = #22995#21517
      Size = 8
    end
  end
  object ClientDataSet2: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'Update_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    Left = 232
    Top = 128
  end
end
